object newmail: Tnewmail Left = 436 Top = 282 BorderIcons = [] BorderStyle = bsNone Caption = 'Milo' ClientHeight = 225 ClientWidth = 423 Color = clBtnFace Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False Position = poDefault OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object skin: TImage Left = 0 Top = 0 Width = 256 Height = 64 AutoSize = True OnMouseMove = skinMouseMove end object button1: TLabel Left = 8 Top = 72 Width = 241 Height = 16 Cursor = crHandPoint AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnClick = button1Click end object button2: TLabel Left = 8 Top = 96 Width = 241 Height = 16 Cursor = crHandPoint AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnClick = button2Click end object message1: TLabel Left = 8 Top = 136 Width = 241 Height = 16 AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseMove = skinMouseMove end object message2: TLabel Left = 8 Top = 160 Width = 241 Height = 16 AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseMove = skinMouseMove end object autoclose_timer: TTimer Interval = 5000 OnTimer = autoclose_timerTimer Left = 384 Top = 8 end end